inherited FUrbanPlan: TFUrbanPlan Left = 220 Top = 112 BorderStyle = bsSingle Caption = 'Urban Plans' ClientHeight = 361 ClientWidth = 593 OldCreateOrder = True OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object GroupBox3: TGroupBox Left = 0 Top = 0 Width = 193 Height = 361 Caption = 'Urban Plans' TabOrder = 0 object PlanListBox: TListBox Left = 8 Top = 16 Width = 177 Height = 305 ItemHeight = 13 TabOrder = 0 OnClick = PlanListBoxClick end object DeleteButton: TButton Left = 104 Top = 328 Width = 75 Height = 25 Caption = 'Delete' TabOrder = 2 Visible = False end object NewButton: TButton Left = 14 Top = 328 Width = 75 Height = 25 Caption = 'New' TabOrder = 1 OnClick = NewButtonClick end end object GroupBox2: TGroupBox Left = 200 Top = 0 Width = 393 Height = 361 Caption = 'Properties' TabOrder = 1 object Bevel1: TBevel Left = 8 Top = 64 Width = 125 Height = 125 end object Bevel2: TBevel Left = 136 Top = 64 Width = 125 Height = 125 end object Label2: TLabel Left = 6 Top = 22 Width = 28 Height = 13 Caption = 'Name' end object Label4: TLabel Left = 8 Top = 232 Width = 55 Height = 13 Caption = 'Height Plan' end object Label5: TLabel Left = 8 Top = 256 Width = 72 Height = 13 Caption = 'Wall Color Plan' end object PlanHeightImage: TImage Left = 10 Top = 66 Width = 119 Height = 119 Stretch = True end object PlanWallColorImage: TImage Left = 138 Top = 66 Width = 121 Height = 121 Stretch = True end object Label1: TLabel Left = 8 Top = 48 Width = 55 Height = 13 Caption = 'Height Plan' end object Label3: TLabel Left = 136 Top = 48 Width = 72 Height = 13 Caption = 'Wall Color Plan' end object Label58: TLabel Left = 8 Top = 304 Width = 84 Height = 13 Caption = 'Plan Size (metres)' end object Label6: TLabel Left = 281 Top = 304 Width = 34 Height = 13 Caption = 'Height:' end object Label7: TLabel Left = 107 Top = 304 Width = 8 Height = 13 Caption = 'x:' end object Label8: TLabel Left = 195 Top = 304 Width = 8 Height = 13 Caption = 'y:' end object Label9: TLabel Left = 264 Top = 48 Width = 74 Height = 13 Caption = 'Roof Color Plan' end object Bevel3: TBevel Left = 264 Top = 64 Width = 125 Height = 125 end object PlanRoofColorImage: TImage Left = 266 Top = 66 Width = 121 Height = 121 Stretch = True end object Label10: TLabel Left = 8 Top = 280 Width = 74 Height = 13 Caption = 'Roof Color Plan' end object Label11: TLabel Left = 8 Top = 208 Width = 56 Height = 13 Caption = 'Urban Type' end object PlanHeightSourceEdit: TEdit Left = 120 Top = 224 Width = 241 Height = 21 ReadOnly = True TabOrder = 1 end object HeightFileButton: TButton Left = 360 Top = 224 Width = 25 Height = 21 Caption = '...' Enabled = False TabOrder = 2 OnClick = HeightFileButtonClick end object PlanNameEdit: TEdit Left = 64 Top = 16 Width = 321 Height = 21 TabOrder = 0 OnChange = PlanNameEditChange end object ModelPathButton: TButton Left = 272 Top = 328 Width = 113 Height = 25 Caption = 'Set Model Directory' TabOrder = 3 end object PlanWallColorSourceEdit: TEdit Left = 120 Top = 248 Width = 241 Height = 21 ReadOnly = True TabOrder = 4 end object WallColorFileButton: TButton Left = 360 Top = 248 Width = 25 Height = 21 Caption = '...' Enabled = False TabOrder = 5 OnClick = WallColorFileButtonClick end object PlanXSizeEdit: TFloatEdit Left = 120 Top = 296 Width = 65 Height = 21 TabOrder = 6 Text = '0.00' OnChange = PlanXSizeEditChange Digits = 2 Max = 99999999.900000000000000000 ErrorMessage = '[No Text]' end object PlanYSizeEdit: TFloatEdit Left = 208 Top = 296 Width = 65 Height = 21 TabOrder = 7 Text = '0.00' OnChange = PlanYSizeEditChange Digits = 2 Max = 99999999.900000000000000000 ErrorMessage = '[No Text]' end object PlanHeightSizeEdit: TFloatEdit Left = 320 Top = 296 Width = 65 Height = 21 TabOrder = 8 Text = '0.00' OnChange = PlanHeightSizeEditChange Digits = 2 Max = 99999999.900000000000000000 ErrorMessage = '[No Text]' end object PlanRoofColorSourceEdit: TEdit Left = 120 Top = 272 Width = 241 Height = 21 ReadOnly = True TabOrder = 9 end object RoofColorFileButton: TButton Left = 360 Top = 272 Width = 25 Height = 21 Caption = '...' Enabled = False TabOrder = 10 OnClick = RoofColorFileButtonClick end object PlanZoneComboBox: TComboBox Left = 120 Top = 200 Width = 89 Height = 21 ItemHeight = 13 Items.Strings = ( 'Suburban' 'Urban' 'Industrial') TabOrder = 11 Text = 'Suburban' OnChange = PlanZoneComboBoxChange end end object OpenPictureDialog: TOpenPictureDialog DefaultExt = 'bmp' Filter = 'Bitmaps (*.bmp)|*.bmp' Options = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist, ofFileMustExist, ofEnableSizing] Left = 208 Top = 328 end end